#region References
using System;
using System.Collections;
using System.Collections.Generic;
using Server.Factions;
using Server.Gumps;
using Server.Mobiles;
using Server.Network;
using Server.SkillHandlers;
using Server.Spells;
using Server.Spells.Fifth;
using Server.Spells.Seventh;
#endregion

namespace Server.Items
{
	public class DisguiseKit : Item
	{
		[Constructable]
		public DisguiseKit()
			: base(0xE05)
		{
			Weight = 1.0;
		}

		public DisguiseKit(Serial serial)
			: base(serial)
		{ }

		public override int LabelNumber { get { return 1041078; } } // a disguise kit

		public override void Serialize(GenericWriter writer)
		{
			base.Serialize(writer);

			writer.Write(0); // version
		}

		public override void Deserialize(GenericReader reader)
		{
			base.Deserialize(reader);

			reader.ReadInt();
		}

		public bool ValidateUse(Mobile from)
		{
			var pm = from as PlayerMobile;

			if (!IsChildOf(from.Backpack))
			{
				// That must be in your pack for you to use it.
				from.SendLocalizedMessage(1042001);
			}
			else if (pm == null || pm.NpcGuild != NpcGuild.ThievesGuild)
			{
				// Only Members of the thieves guild are trained to use this item.
				from.SendLocalizedMessage(501702);
			}
			else if (Stealing.SuspendOnMurder && pm.Kills > 0)
			{
				// You are currently suspended from the thieves guild.  They would frown upon your actions.
				from.SendLocalizedMessage(501703);
			}
			else if (!from.CanBeginAction(typeof(IncognitoSpell)))
			{
				// You cannot disguise yourself while incognitoed.
				from.SendLocalizedMessage(501704);
			}
			else if (Sigil.ExistsOn(from))
			{
				from.SendLocalizedMessage(1010465); // You cannot disguise yourself while holding a sigil
			}
			else if (TransformationSpellHelper.UnderTransformation(from))
			{
				// You cannot disguise yourself while in that form.
				from.SendLocalizedMessage(1061634);
			}
			else if (from.BodyMod == 183 || from.BodyMod == 184)
			{
				// You cannot disguise yourself while wearing body paint
				from.SendLocalizedMessage(1040002);
			}
			else if (!from.CanBeginAction(typeof(PolymorphSpell)) || from.IsBodyMod)
			{
				// You cannot disguise yourself while polymorphed.
				from.SendLocalizedMessage(501705);
			}
			else
			{
				return true;
			}

			return false;
		}

		public override void OnDoubleClick(Mobile from)
		{
			if (ValidateUse(from))
			{
				from.SendGump(new DisguiseGump(from, this, true, false));
			}
		}
	}

	public class DisguiseGump : Gump
	{
		private static readonly DisguiseEntry[] m_HairEntries = {new DisguiseEntry(8251, 50700, 0, 5, 1011052), // Short
			new DisguiseEntry(8261, 60710, 0, 3, 1011047), // Pageboy
			new DisguiseEntry(8252, 60708, 0, -5, 1011053), // Long
			new DisguiseEntry(8264, 60901, 0, 5, 1011048), // Receding
			new DisguiseEntry(8253, 60702, 0, -5, 1011054), // Ponytail
			new DisguiseEntry(8265, 60707, 0, -5, 1011049), // 2-tails
			new DisguiseEntry(8260, 50703, 0, 5, 1011055), // Mohawk
			new DisguiseEntry(8266, 60713, 0, 10, 1011050), // Topknot
			null, new DisguiseEntry(0, 0, 0, 0, 1011051) // None
		};

		private static readonly DisguiseEntry[] m_BeardEntries = {new DisguiseEntry(8269, 50906, 0, 0, 1011401), // Vandyke
			new DisguiseEntry(8257, 50808, 0, -2, 1011062), // Mustache
			new DisguiseEntry(8255, 50802, 0, 0, 1011060), // Short beard
			new DisguiseEntry(8268, 50905, 0, -10, 1011061), // Long beard
			new DisguiseEntry(8267, 50904, 0, 0, 1011060), // Short beard
			new DisguiseEntry(8254, 50801, 0, -10, 1011061), // Long beard
			null, new DisguiseEntry(0, 0, 0, 0, 1011051) // None
		};

		private readonly Mobile m_From;
		private readonly DisguiseKit m_Kit;
		private readonly bool m_Used;

		public DisguiseGump(Mobile from, DisguiseKit kit, bool startAtHair, bool used)
			: base(50, 50)
		{
			m_From = from;
			m_Kit = kit;
			m_Used = used;

			from.CloseGump(typeof(DisguiseGump));

			AddPage(0);

			AddBackground(100, 10, 400, 385, 2600);

			// <center>THIEF DISGUISE KIT</center>
			AddHtmlLocalized(100, 25, 400, 35, 1011045, false, false);

			AddButton(140, 353, 4005, 4007, 0, GumpButtonType.Reply, 0);
			AddHtmlLocalized(172, 355, 90, 35, 1011036, false, false); // OKAY

			AddButton(257, 353, 4005, 4007, 1, GumpButtonType.Reply, 0);
			AddHtmlLocalized(289, 355, 90, 35, 1011046, false, false); // APPLY

			if (from.Female || from.Body.IsFemale)
			{
				DrawEntries(0, 1, -1, m_HairEntries, -1);
			}
			else if (startAtHair)
			{
				DrawEntries(0, 1, 2, m_HairEntries, 1011056);
				DrawEntries(1, 2, 1, m_BeardEntries, 1011059);
			}
			else
			{
				DrawEntries(1, 1, 2, m_BeardEntries, 1011059);
				DrawEntries(0, 2, 1, m_HairEntries, 1011056);
			}
		}

		public override void OnResponse(NetState sender, RelayInfo info)
		{
			if (info.ButtonID == 0)
			{
				// Disguises wear off after 2 hours. : You're looking good.
				m_From.SendLocalizedMessage(m_Used ? 501706 : 501707);
				return;
			}

			var switches = info.Switches;

			if (switches.Length == 0)
			{
				return;
			}

			var switched = switches[0];
			var type = switched % 2;
			var index = switched / 2;

			var hair = (type == 0);

			var entries = (hair ? m_HairEntries : m_BeardEntries);

			if (index >= 0 && index < entries.Length)
			{
				var entry = entries[index];

				if (entry == null)
				{
					return;
				}

				if (!m_Kit.ValidateUse(m_From))
				{
					return;
				}

				if (!hair && (m_From.Female || m_From.Body.IsFemale))
				{
					return;
				}

				m_From.NameMod = NameList.RandomName(m_From.Female ? "female" : "male");

				if (m_From is PlayerMobile)
				{
					var pm = (PlayerMobile)m_From;

					if (hair)
					{
						pm.SetHairMods(entry.m_ItemID, -2);
					}
					else
					{
						pm.SetHairMods(-2, entry.m_ItemID);
					}
				}

				m_From.SendGump(new DisguiseGump(m_From, m_Kit, hair, true));

				DisguiseTimers.RemoveTimer(m_From);

				DisguiseTimers.CreateTimer(m_From, TimeSpan.FromHours(2.0));
				DisguiseTimers.StartTimer(m_From);
				
				BuffInfo.AddBuff(m_From, new BuffInfo(BuffIcon.Disguised, 1075821, 1075820, TimeSpan.FromHours(2.0), m_From));
			}
		}

		private void DrawEntries(int index, int page, int nextPage, DisguiseEntry[] entries, int nextNumber)
		{
			AddPage(page);

			if (nextPage != -1)
			{
				AddButton(155, 320, 250 + (index * 2), 251 + (index * 2), 0, GumpButtonType.Page, nextPage);
				AddHtmlLocalized(180, 320, 150, 35, nextNumber, false, false);
			}

			for (var i = 0; i < entries.Length; ++i)
			{
				var entry = entries[i];

				if (entry == null)
				{
					continue;
				}

				var x = (i % 2) * 205;
				var y = (i / 2) * 55;

				if (entry.m_GumpID != 0)
				{
					AddBackground(220 + x, 60 + y, 50, 50, 2620);
					AddImage(153 + x + entry.m_OffsetX, 15 + y + entry.m_OffsetY, entry.m_GumpID);
				}

				AddHtmlLocalized(140 + x, 72 + y, 80, 35, entry.m_Number, false, false);
				AddRadio(118 + x, 73 + y, 208, 209, false, (i * 2) + index);
			}
		}

		private class DisguiseEntry
		{
			public readonly int m_Number;
			public readonly int m_ItemID;
			public readonly int m_GumpID;
			public readonly int m_OffsetX;
			public readonly int m_OffsetY;

			public DisguiseEntry(int itemID, int gumpID, int ox, int oy, int name)
			{
				m_ItemID = itemID;
				m_GumpID = gumpID;
				m_OffsetX = ox;
				m_OffsetY = oy;
				m_Number = name;
			}
		}
	}

	public class DisguiseTimers
	{
        private static Dictionary<Mobile, InternalTimer> m_Timers = new Dictionary<Mobile, InternalTimer>();

        public static Dictionary<Mobile, InternalTimer> Timers { get { return m_Timers; } }

		public static void CreateTimer(Mobile m, TimeSpan delay)
		{
			if (m != null)
			{
				if (!m_Timers.ContainsKey(m))
				{
					m_Timers[m] = new InternalTimer(m, delay);
				}
			}
		}

		public static void StartTimer(Mobile m)
		{
            if (m_Timers.ContainsKey(m))
            {
                var t = m_Timers[m];

                if (t != null)
                {
                    t.Start();
                }
            }
		}

		public static bool IsDisguised(Mobile m)
		{
			return m_Timers.ContainsKey(m);
		}

		public static bool StopTimer(Mobile m)
		{
            if (m_Timers.ContainsKey(m))
            {
                var t = m_Timers[m];

                if (t != null)
                {
                    t.Stop();
                }

                return true;
            }

            return false;
		}

		public static bool RemoveTimer(Mobile m)
		{
            if (m_Timers.ContainsKey(m))
            {
                var t = m_Timers[m];

                if (t != null)
                {
                    t.Stop();
                    m_Timers.Remove(m);
                }

                return true;
            }

            return false;
		}

		public static TimeSpan TimeRemaining(Mobile m)
		{
            if (m_Timers.ContainsKey(m))
            {
                var t = m_Timers[m];

                if (t != null && t.Expires > DateTime.UtcNow)
                {
                    return t.Expires - DateTime.UtcNow;
                }
            }

			return TimeSpan.Zero;
		}

		public class InternalTimer : Timer
		{
			private readonly Mobile m_Player;

            public DateTime Expires { get; private set; }

			public InternalTimer(Mobile m, TimeSpan delay)
				: base(delay)
			{
				m_Player = m;
				Priority = TimerPriority.OneMinute;

                Expires = DateTime.UtcNow + delay;
			}

			protected override void OnTick()
			{
				m_Player.NameMod = null;

				if (m_Player is PlayerMobile)
				{
					((PlayerMobile)m_Player).SetHairMods(-1, -1);
				}

				RemoveTimer(m_Player);
			}
		}
	}
}
